home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / SO1.ZIP / event.ini < prev    next >
INI File  |  1997-02-22  |  5KB  |  62 lines
  1. [Events]
  2. n0=1:ON ERROR:*:echo -a %st.echo $nick $+ : $parms
  3. n1=1:ON QUIT { %inc.stuf = 1 | :lewp
  4. n2=  if ($nick ison $chan(%inc.stuf)) { echo $chan(%inc.stuf) %st.echo 5QUIT: $nick $+ 4[1,00 $+ $address $+ 4]1,00 4(1,00 $+ $parms $+ 4)1,00 @ $+ %st.time | inc %inc.stuf | goto lewp }
  5. n3=  elseif ($chan(%inc.stuf) != $null) { inc %inc.stuf | goto lewp }
  6. n4=  else { goto end }
  7. n5=  :end
  8. n6=}
  9. n7=1:ON WALLOPS:*:/echo -a %st.oper 5!4 $+ $nick $+ 5! $parms | set %relop %so.oper ! $+ $nick $+ ! $parms | halt
  10. n8=1:ON TEXT:*:? {
  11. n9=  if ($active != $nick) {
  12. n10=    _relm.inc ( $+ $lower($nick) $+ [ $+ $lower($address) $+ ]) $parms
  13. n11=    echo -a %st.io 4( $+ $lower($nick) $+ 4[1,00 $+ $lower($address) $+ 4])1,00 $parms
  14. n12=    if (%mbeep == $null) { beep }
  15. n13=    if (($away) && ($ultog(L) == ON)) { write awaylog.txt /echo -a %st.echo 4( $+ $nick $+ 4[ $+ $address $+ 4]) $parms @ $+ %st.time }
  16. n14=    if (%query != $null) { halt }
  17. n15=  }
  18. n16=  else { _relm.inc ( $+ $lower($nick) $+ [ $+ $lower($address) $+ ]) $parms | if (%mbeep == $null) { beep } }
  19. n17=}
  20. n18=1:ON ACTION:*:? { if ($active != $nick) { echo 6 -a %st.io * $lower($nick) $parms } }
  21. n19=1:ON ACTION:*:#:/echo $chan 13!6 $nick $strip($parms) | halt
  22. n20=1:ON NOTIFY:.quote USERHOST $nick | halt
  23. n21=1:ON JOIN:# {
  24. n22=  if ($nick == $me) { echo $chan %st.echo joined $chan @ $+ %st.time }
  25. n23=  else { 
  26. n24=    %join.tmp.1 = $readini uzer.ini $address($nick,3) entry | %join.tmp.2 = $readini uzer.ini $address($nick,3) mode | %join.tmp.3 = $readini uzer.ini $address($nick,3) not | %join.tmp.4 = $readini uzer.ini $address($nick,3) chan
  27. n25=    if (%join.tmp.1 != $null) {
  28. n26=      if (%join.tmp.2 == +b) { .mode $chan -o+b $nick $address($nick,3) | .quote kick $chan $nick :[ slist: %join.tmp.3 ][!so!] | echo $chan %st.echo 5JOIN: $nick $+ 4[kickbanning4] shitlist4[1,00 $+ $address($nick,3) $+ 4]1,00 @ $+ %st.time | goto end }
  29. n27=      elseif (((%join.tmp.2 == +o) && ($chan isin %join.tmp.4) || ($gettok(%join.tmp.4,1,32) == *))) { .mode $chan +o $nick | echo $chan %st.echo 5JOIN: $nick $+ 4[autooping4] friend4[1,00 $+ $address($nick,3) $+ 4]1,00 @ $+ %st.time | goto end }
  30. n28=      else { goto mid }
  31. n29=    }
  32. n30=    else {
  33. n31=      echo $chan %st.echo 5JOIN: $nick $+ 4[1,00 $+ $address $+ 4]1,00 @ $+ %st.time | goto end
  34. n32=    }
  35. n33=    :mid
  36. n34=    echo $chan %st.echo 5JOIN: $nick $+ 4[1,00 $+ $address $+ 4]1,00 @ $+ %st.time
  37. n35=    :end
  38. n36=  }
  39. n37=}
  40. n38=1:ON PART:#:echo $chan %st.echo 5PART: $nick $+ 4[1,00 $+ $address $+ 4]1,00 @ $+ %st.time
  41. n39=1:ON SNOTICE:*IP? Mismatch? *.*:echo -a %st.oper 5SERVER: IP mismatch: $parm6 5!= $gettok($parm8,1,91) | halt
  42. n40=1:ON SNOTICE:*KILL message*:if (. !isin $parm10) { echo -a %st.oper 5OPERKILL: $parm10 killed $remove($parm8,.) $parm13* | set %relk [!**!] $parm10 killed $remove($parm8,.) $parm13* | halt } | else halt
  43. n41=1:ON SNOTICE:*Notice -- Invis count updated*:echo -a %st.oper 5SERVER: invisible user count updated, was off by 4,00 $+ $parm10 $+  | halt
  44. n42=1:ON SNOTICE:*Notice -- Terminating client for excess flood*:echo -a %st.oper 5SERVER: client dropped for flood: 4( $+ $parm9 $+ $parm10 $+ 4) | halt
  45. n43=1:ON SNOTICE:*Notice -- Nick collision on*:echo -a %st.oper 5SERVER: nick collision: $parm7* | halt
  46. n44=1:ON SNOTICE:*Global -- from *:echo -a %st.oper 5!4global5!4,00 $+ $strEnd($parm5) $+ 5! $parm6*
  47. n45=1:ON SNOTICE:*:halt
  48. n46=1:ON INVITE:#:/echo -a %st.io 5INVITE: 4 $+ $nick $+  invites you to4 $chan $+ , F6 to join | set %st.inv $chan | halt
  49. n47=1:ON CTCPREPLY:PING* {
  50. n48=  if ($parm2 isnum) { echo -a %st.io 5CTCPREPLY: $nick $+ 4[ $+ $address $+ 4] PING4[ $+ $_dec($parm2) seconds4] | halt }
  51. n49=  else { echo -a %st.io 5CTCPREPLY: $nick $+ 4[ $+ $address $+ 4] PING4[ $+ $parm2* $+ 4] | halt }
  52. n50=}
  53. n51=1:ON CTCPREPLY:*:echo -a %st.io 5CTCPREPLY: $nick $+ 4[ $+ $address $+ 4] $parm1 $+ 4[ $+ $parm2* $+ 4] | halt
  54. n52=1:ON NOTICE:*:* {
  55. n53=  set %reln -( $+ $lower($nick) $+ [ $+ $lower($address) $+ ])- $parms
  56. n54=  if (%nbeep != $null) { beep }
  57. n55=}
  58. n56=1:ON BAN:# {
  59. n57=  if (((. isin $nick ) && ($banmask iswm $address($me,1)) && ($me isop $chan))) { echo -a %st.echo ban on you4[ $+ $chan $+ 5/ $+ $banmask $+ 5/ $+ $nick $+ 4] | mode $chan -b $banmask }
  60. n58=  elseif (($me isop $chan) && ($banmask iswm $address($me,1))) { echo -a %st.echo ban on you4[ $+ $chan $+ 5/ $+ $banmask $+ 5/ $+ $nick $+ 4] | mode $chan -bo+b $banmask $nick $address($nick,3) | .quote kick $chan $nick :[ don't ban me, bitch ][!so!] }
  61. n59=}
  62.